home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
science
/
sm32a.zip
/
LIBRARY
/
RE.LI
< prev
next >
Wrap
Text File
|
1993-12-25
|
92b
|
4 lines
re(a_+b_) := re(a)+re(b)
re(a_*b_) := re(a)*re(b)-im(a)*im(b)
re(x_) := if(isreal(x), x)